Public Class clsDatosSD
    Inherits clsBaseDatos

    Function CargaDatosSD(ByVal str As String)
        Return MyBase.TraerDataSet(str)
    End Function

    Function Eliminar(ByVal strTablaAfectar As String, ByVal strCampoAfectar As String, ByVal strValorLlave As String)
        Dim strSql As String

        strSql = "Delete From " & strTablaAfectar & " Where " & strCampoAfectar & "=" & strValorLlave
        MyBase.MovRegistro(strSql, clsBaseDatos.TipoMovimiento.Borrado)
    End Function
End Class
